﻿Module Module1

	Sub Main()

	End Sub

	Public Class Foo
		Inherits Granite.Modeling.SimpleModelBase

		Public Property Zoom As Integer
			Get
				Return Me.Get(Of Integer)("Zoom")
			End Get
			Set(value As Integer)
				Me.Set(value, "Zoom")
			End Set
		End Property

	End Class

End Module



